﻿Public Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim iSer As New USPSAddressValidation.USPS.AddressServices
        ltResults.Mode = LiteralMode.Encode
        ltResults.Text = iSer.GetDataFromSite(Server.UrlPathEncode(iSer.CreateXMLAddressRequest(New USPSAddressValidation.USPS.Address With {
                                         .Address1 = "",
                                         .Address2 = "40 Newport Parkway",
                                          .City = "jersey city",
                                          .State = "NJ",
                                          .Zip5 = ""})))
    End Sub

End Class